--Used on section card to compile the topic cards for a subject
--heading and place them in the Topic button handler for display
--in the Topics field.
--Can be used to compile topics for a single subject specified
--by number.
--ButtonNum is the card button number of a single heading, or
--with doAllFlag=1, the number of card buttons to be compiled.
choose browse tool
if the paramCount is 2 then
put ButtonNum into TimesToRepeat
put 1 into cb
else
put 1 into TimesToRepeat
put ButtonNum into cb
end if
repeat timesToRepeat
push card
put "on mouseUp" & return & "popUp" && cb && "," into newScript
put the short name of card button cb into thisSubject
click at the loc of card button cb
put the id of this background into thisBackground
repeat while field 1 contains thisSubject or field 4 contains thisSubject
if field 1 is not empty then
set the name of this card to field 1
put quote & field 1 & quote && "&return& " after newScript
else
set the name of this card to field 3
put quote & field 3 & quote && "&return& " after newScript
end if
go to next card
if the id of this background is not thisBackground
then
exit repeat
end if
end repeat
delete last char of newScript
delete last char of newScript
pop card
put return & "end mouseUp" & return after newScript
set the script of card button ("Topic"&cb) to newScript
add 1 to cb
end repeat
end listHeads
-- part 1 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=51 top=70 right=100 bottom=276
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: Notes on HyperCard
----- HyperTalk script -----
on mouseUp
go to card id 9364
end mouseUp
-- part 10 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=51 top=101 right=128 bottom=255
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: Working with UNIX
----- HyperTalk script -----
on mouseUp
go to card id 9006
end mouseUp
-- part 2 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=51 top=130 right=159 bottom=185
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: Stacks and Cards
----- HyperTalk script -----
on mouseUp
go to card id 8930
end mouseUp
-- part 3 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=51 top=161 right=187 bottom=168
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: Navigation
----- HyperTalk script -----
on mouseUp
go to card id 7921
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=50 top=189 right=217 bottom=217
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: Selecting From Fields
----- HyperTalk script -----
on mouseUp
go to card id 10806
end mouseUp
-- part 9 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=50 top=218 right=247 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: Searching for Keywords
----- HyperTalk script -----
on mouseUp
go to card id 22057
end mouseUp
-- part 6 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=50 top=249 right=277 bottom=188
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: Attaching A Note
----- HyperTalk script -----
on mouseUp
go to card id 6194
end mouseUp
-- part 8 (button)
-- low flags: 00
-- high flags: 0001
-- rect: left=195 top=294 right=322 bottom=258
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: Continue
----- HyperTalk script -----
on mouseUp
Go to prev card
end mouseUp
-- part 11 (button)
-- low flags: 00
-- high flags: A001
-- rect: left=14 top=277 right=322 bottom=59
-- title width / last selected line: 0
-- icon id / first selected line: 26865 / 26865
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Index
----- HyperTalk script -----
on mouseUp
go to last card
end mouseUp
-- part 13 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=24 top=70 right=100 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 12678 / 12678
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Topic1
----- HyperTalk script -----
on mouseUp
popUp 1, "Notes on HyperCard" &return& "Our Nutshell Philosophy" &return& "The Right Tool" &return& "On the Wrong Machine?" &return& "Hypertext vs. HyperCard" &return& "The Viewing Environment" &return
end mouseUp
-- part 14 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=24 top=129 right=160 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 12678 / 12678
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Topic3
----- HyperTalk script -----
on mouseUp
popUp 3, "Stacks and Cards" &return& "Nutshell Stack" &return& "Opening Stacks" &return& "Transfering to Other Stacks" &return& "Place Holders" &return& "Types of Cards" &return& "Opening Cards" &return& "Section Cards" &return& "Topic Cards" &return& "Reference Cards" &return& "Links" &return
end mouseUp
-- part 15 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=24 top=159 right=189 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 12678 / 12678
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Topic4
----- HyperTalk script -----
on mouseUp
popUp "4" , "About Navigation" &return& "Navigation Controls" &return& "The Go Menu" &return& "Common Navigation Controls" &return& "Go Back" &return& "Mark and Return To Mark" &return& "Automatic Marking of Cards" &return& "Flip-Through" &return& "Arrows" &return& "Using Topic Card Numbers" &return& "The Squirrel" &return& "Navigation By Card" &return
end mouseUp
-- part 16 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=24 top=189 right=219 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 12678 / 12678
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Topic5
----- HyperTalk script -----
on mouseUp
popUp 5, "Selecting From Fields" &return& "Lists of Commands" &return& "Selecting Lines" &return& "Lists of Topics" &return& "Overlapping Fields" &return
end mouseUp
-- part 17 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=24 top=248 right=278 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 12678 / 12678
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Topic7
----- HyperTalk script -----
on mouseUp
popUp 7, "About Attaching A Note" &return
end mouseUp
-- part 18 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=24 top=218 right=248 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 12678 / 12678
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Topic6
----- HyperTalk script -----
on mouseUp
popUp 6 ,"Searching for Keywords" &return& "Continuing a Search" &return& "Using the Find Command" &return& "Searching Tips" &return
end mouseUp
-- part 19 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=24 top=100 right=130 bottom=54
-- title width / last selected line: 0
-- icon id / first selected line: 12678 / 12678
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Topic2
----- HyperTalk script -----
on mouseUp
popUp 2, "Working with UNIX" &return& "Communications Programs" &return& "MultiFinder and Switcher" &return& "MacNIX‚Ñ¢" &return& "Running Under HyperDA‚Ñ¢" &return& "A/UX‚Ñ¢ for Mac II" &return
end mouseUp
-- part 20 (button)
-- low flags: 80
-- high flags: C002
-- rect: left=277 top=67 right=95 bottom=467
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 21
-- text size: 14
-- style flags: 256
-- line height: 18
-- part name: Topics
----- HyperTalk script -----
on mouseUp
put "Drag across the name of a command to select it."
end mouseUp
-- part 26 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=340 top=119 right=239 bottom=461
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Icon Inventory
----- HyperTalk script -----
on mouseUp
go to card id 19083
end mouseUp
-- part 21 (button)
-- low flags: 80
-- high flags: 4000
-- rect: left=279 top=70 right=94 bottom=306
-- title width / last selected line: 0
-- icon id / first selected line: 12678 / 12678
-- text alignment: 1
-- font id: 20
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: box
----- HyperTalk script -----
on mouseUp
popDown
end mouseUp
-- part 22 (field)
-- low flags: 81
-- high flags: 0002
-- rect: left=277 top=95 right=293 bottom=467
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: topics
----- HyperTalk script -----
on mouseUp
get lineSelect()
go to card (it)
end mouseUp
-- part 23 (field)
-- low flags: 81
-- high flags: 0000
-- rect: left=197 top=34 right=63 bottom=392
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: lastTopic
-- part 27 (button)
-- low flags: 00
-- high flags: 2001
-- rect: left=13 top=28 right=57 bottom=46
-- title width / last selected line: 0
-- icon id / first selected line: 11304 / 11304
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Bird
----- HyperTalk script -----
on mouseUp
bird "card button 10"
end mouseUp
-- part 28 (field)
-- low flags: 81
-- high flags: 0004
-- rect: left=156 top=120 right=215 bottom=357
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Bird
-- part contents for background part 6
----- text -----
Subject Areas
-- part contents for background part 23
----- text -----
1 of 46
-- part contents for card part 28
----- text -----
Click on the black box beside a subject title to display a list of topics for that particular subject. Select any topic from that list by clicking on it.
